home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 41 / PC Gamer IT CD 41 2-2.iso / utility / CISEI / 8BIT / FINCHA.DXR / 00012.ls < prev    next >
Encoding:
Text File  |  1998-10-06  |  464 b   |  26 lines
  1. on tastimain
  2.   global NumTasto, fra, flag, LastEvidente
  3.   if NumTasto = 5 then
  4.     set fra to the frame
  5.     puppetTransition(51)
  6.     set LastEvidente to 8
  7.     cursor([member "C1", member "C2"])
  8.     go("Quit")
  9.     exit
  10.   end if
  11.   if NumTasto = 8 then
  12.     set flag to 0
  13.     sistemaframe()
  14.     puppetTransition(51)
  15.     go(fra)
  16.     exit
  17.   end if
  18.   if NumTasto = 9 then
  19.     puppetTransition(51)
  20.     go("Credit")
  21.     exit
  22.   end if
  23.   puppetTransition(51)
  24.   go("VAI")
  25. end
  26.